home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / ComputerScience / MethodsInAction / MethodsInAction.app / CircleView.m < prev    next >
Encoding:
Text File  |  1992-08-19  |  452 b   |  27 lines
  1.  
  2. /* Generated by Interface Builder */
  3.  
  4. #import "CircleView.h"
  5. #import <appkit/graphics.h>
  6. #import <dpsclient/psops.h>
  7. #import <appkit/Control.h>
  8.  
  9. @implementation CircleView
  10.  
  11. - resizeCircle:sender
  12. {
  13.     radius=[radiusSlider floatValue];
  14.      [self display];
  15.      return self;
  16. }
  17. - drawSelf:(NXRect *) theRect  :(int) rectCount
  18. {
  19.     PSnewpath();
  20.     PSarc(frame.size.width/2, frame.size.height/2, radius, 0.0, 360);
  21.     PSclosepath();
  22.     PSfill();
  23.     
  24.     return self;
  25. }
  26. @end
  27.